home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
BBS Toolkit
/
BBS Toolkit.iso
/
remote
/
mult200.zip
/
DOORBATS.ZIP
/
FREQ.BAT
< prev
next >
Wrap
DOS Batch File
|
1991-12-10
|
857b
|
43 lines
@ECHO OFF
ECHO ┌───────────────┐
ECHO │ RTS FREQ │
ECHO └───────────────┘
if %port% == 0 goto helpregl
type c:\ra\helpreg.txt > com%port%:
goto regend
:helpregl
type c:\ra\helpreg.txt
:regend
dvcomand wait 20
if exist c:\ra\findfile\inuse.txt goto oops!
rem > c:\ra\findfile\inuse.txt
if %node% == N3 goto rennodedef
if %node% == N2 goto rennodedef
goto node1
:rennodedef
ren dorinfo1.def dorinfo%1.def
:node1
CD \ra\findfile
copy c:\ra\%node%\dorinfo%1.def
rtsfreq %1
del c:\ra\findfile\inuse.txt
CD \RA\%node%
if %node% == N3 goto node3e
if %node% == N2 goto node2e
goto end
:node3e
ren dorinfo3.def dorinfo1.def
goto end
:node2e
ren dorinfo2.def dorinfo1.def
goto end
:oops!
if %port% == 0 goto oops!l
type c:\ra\used.txt > com%port%:
goto oopsend
:oops!l
type c:\ra\used.txt
:oopsend
dvcomand wait 20
:end